#===============================================

ON_EVENT "AfterCreateModelingNode" {
   
#   CALL dll:(g_sScriptLocation + "MkGuidDll.dll") function:"long mkGuid(char * dummy, char** guid)"
#   CC "Core" SET_ATTR_VAL objid:(objid) attrname:"GUID" val:(guid)
}
ON_EVENT "AfterCreateModelingConnector" {
#   CALL dll:(g_sScriptLocation + "MkGuidDll.dll") function:"long mkGuid(char * dummy, char** guid)"
#   CC "Core" SET_ATTR_VAL objid:(objid) attrname:"GUID" val:(guid)
}
ON_EVENT "AfterCreateRecordRow" {
#   CALL dll:(g_sScriptLocation + "MkGuidDll.dll") function:"long mkGuid(char * dummy, char** guid)"
#   CC "Core" SET_ATTR_VAL objid:(rowid) attrname:"GUID" val:(guid)
}


#---- INIT GLOBAL VARS
ON_EVENT "AppInitialized"
{
  # init folder for geo stuff
  CC "Application" GET_PATH
  SETG sADOxxPath:(path)
  SETG sADOxxPathGeo:(path + "\\geo\\")
  CC "AdoScript" DIR_CREATE path:(sADOxxPathGeo)

  #SETG g_sScriptLocation:"D:\\RESEARCH PROJECTS\\eSAVE\\local\\20130213 - eSAVE - Prototype Development\\"
  SETG g_sScriptLocation:"db:\\"

  CC "AdoScript" FILE_COPY from:(g_sScriptLocation+ "wget.exe") to:(sADOxxPathGeo + "wget.exe")
  CC "AdoScript" FILE_COPY from:(g_sScriptLocation+ "download_coordinates.bat") to:(sADOxxPathGeo + "download_coordinates.bat")
  CC "AdoScript" FILE_COPY from:(g_sScriptLocation+ "download_weather.bat") to:(sADOxxPathGeo + "download_weather.bat")
  CC "AdoScript" FILE_COPY from:(g_sScriptLocation+ "download_route.bat") to:(sADOxxPathGeo + "download_route.bat")
  CC "AdoScript" FILE_COPY from:(g_sScriptLocation+ "download_matrix.bat") to:(sADOxxPathGeo + "download_matrix.bat")
  CC "AdoScript" FILE_COPY from:(g_sScriptLocation+ "download_map.bat") to:(sADOxxPathGeo + "download_map.bat")
  CC "AdoScript" FILE_COPY from:(g_sScriptLocation+ "download_location.bat") to:(sADOxxPathGeo + "download_location.bat")
  CC "AdoScript" FILE_COPY from:(g_sScriptLocation+ "download_altitude.bat") to:(sADOxxPathGeo + "download_altitude.bat")

  CC "Application" REMOVE_MENU_ITEM
    component:"modeling" item:"Process tools"

  EXECUTE file:(g_sScriptLocation + "set_proxy.asc")
}

#-----------------------------------------------
ITEM "Search position for all nodes" modeling:"Geolocation tools"
#-----------------------------------------------
EXECUTE file:(g_sScriptLocation + "search_position_all.asc")
#-----------------------------------------------
ITEM "Position all nodes" modeling:"Geolocation tools"
#-----------------------------------------------
EXECUTE file:(g_sScriptLocation + "update_position_all.asc")
#-----------------------------------------------
ITEM "Update altitude for all nodes" modeling:"Geolocation tools"
#-----------------------------------------------
EXECUTE file:(g_sScriptLocation + "update_altitude_all.asc")
#-----------------------------------------------
ITEM "Update weather for all nodes" modeling:"Geolocation tools"
#-----------------------------------------------
EXECUTE file:(g_sScriptLocation + "update_weather_all.asc")
#-----------------------------------------------
ITEM "Update routing for all connections" modeling:"Geolocation tools"
#-----------------------------------------------
EXECUTE file:(g_sScriptLocation + "calculate_route_all.asc")
#-----------------------------------------------
ITEM "Add multiple nodes to map" modeling:"Geolocation tools"
#-----------------------------------------------
EXECUTE file:(g_sScriptLocation + "add_nodes_map.asc")
#-----------------------------------------------
ITEM "Add all possible connections" modeling:"Geolocation tools"
#-----------------------------------------------
EXECUTE file:(g_sScriptLocation + "add_all_relations.asc")

ITEM "Set proxy server" modeling:"Geolocation tools"
#-----------------------------------------------
EXECUTE file:(g_sScriptLocation + "set_proxy.asc")


#-----------------------------------------------
ITEM "AdoScript Debug Shell"
     acquisition:"Extras" modeling:"Extras" analysis:"Extras"
     simulation:"Extras" evaluation:"Extras" importexport:"Extras"
#-----------------------------------------------
IF (type (adoscript) = "undefined") {
  SETG adoscript:""
}
CC "AdoScript" EDITBOX text:(adoscript)
      fontname:"Courier New" fontheight:12
      title:"Debug code" oktext:"Run"
IF (endbutton = "ok") {
  SETG adoscript:(text)
  EXECUTE (text)
}